normVowels is a
convenience function wrapping to the individual norm[Method]
functions.normBark(f)
normErb(f)
normLog(f)
normMel(f)
normLobanov(f, group=NULL)
normLogmean(f, group=NULL, exp=FALSE, ...)
normNearey1(f, group=NULL, exp=FALSE, ...)
normNearey2(f, group=NULL, exp=FALSE, ...)
normSharedLogmean(f, group=NULL, exp=FALSE, ...)
normWattFabricius(f, vowel, group=NULL)
normVowels(method, f0=NULL, f1=NULL, f2=NULL, f3=NULL,
vowel=NULL, group=NULL, ...)normVowels, which returns an
n-by-m matrix of n data points by m formants with formants in ascending
order with fundamental frequency first (if present), and
normWattFabricius (or normVowels with
method=wattfabricius), which only and always returns F1 and F2,
regardless of whether f0 and F3 were supplied.normLogmean is a synonym for normNearey1, which is also sometimes
confusingly called normSharedLogmean is a
synonym for normNearey2. The argument exp=TRUE for these functions
will yield values that are consistent with the norm.nearey
implementation, which takes the result of Nearey's original formulae and uses
it as the exponent of the base of the natural logarithm (presumably so that
the function always yields positive values). Note that normErb returns the
The implementation of the Watt-Fabricius method varies slightly from the
formula in Watt & Fabricius (2002), since normWattFabricius simply
calculates which vowel has the highest mean F1 value and designates it as
the low corner of the triangle, rather than asking the user to expressly
specify the normWattFabricius simply calculates which vowel has the highest mean
F2 value and uses that to calculate the upper left corner, rather than
expressly looking for the mean of the group, normWattFabricius
returns an error.
Lobanov, B. M. 1971
McCloy, D. R. 2012
Nearey, T. M. 1978
Stevens, S. S., & Volkmann, J. 1940
Traunmuller, H. 1990
Watt, D., & Fabricius, A. H. 2002
data(indoVowels)
bark <- with(indo, normBark(cbind(f1, f2)))
erbn <- with(indo, normErb(cbind(f1, f2)))
mel <- with(indo, normMel(cbind(f1, f2)))
lobanov <- with(indo, normLobanov(cbind(f1, f2), group=subj))
lognormed <- with(indo, normLog(cbind(f1, f2)))
# using the convenience wrapper:
bark <- with(indo, normVowels('bark', f1=f1, f2=f2))
wattfab <- with(indo, normVowels('wattfabricius', f1=f1, f2=f2,
vowel=vowel, group=subj))Run the code above in your browser using DataLab